home *** CD-ROM | disk | FTP | other *** search
/ Micromanía 93 / CDMM_93_2.ISO / Project Nomads / nomads_demo_eng.exe / GARAGE.TCL < prev    next >
Encoding:
Text File  |  2002-04-19  |  5.3 KB  |  204 lines
  1. #
  2. #   Zustands-▄berwachungs-Script
  3. #   State Watch Script
  4. #
  5. #   Garage
  6. #
  7. #   created:    15-Jun-2000 Bernd
  8. #   
  9. #   (C) COPYRIGHT 2000 RADONLABS GMBH
  10. #
  11.  
  12.  
  13. # --------------------------------------------------------
  14. #                     G A R A G E N
  15. # --------------------------------------------------------
  16. proc garagewatch_normal {} {
  17.  
  18.     # vorerst hier unzerstoerbar. Bleibt so, bis es aufgesammelt
  19.     # (in BackPack) oder gebaut (kein Artefakt mehr) wird 
  20.     if {[.getartefactmode] == "false"} {
  21.         .announcestate house
  22.     } elseif {[.iscollected] == "true"} {
  23.         .announcestate backpack
  24.     } elseif {[.getcharges] <= 0} {
  25.         .setremoveable true
  26.     } elseif {[.getcreator] != "null"} {
  27.         .announcestate infactoryslot
  28.     }
  29. }
  30.  
  31. proc garagewatch_infactoryslot {} {
  32.  
  33.     # vorerst hier unzerstoerbar. Bleibt so, bis es aufgesammelt
  34.     # (in BackPack) oder gebaut (kein Artefakt mehr) wird 
  35.     if {[.getartefactmode] == "false"} {
  36.         .announcestate house
  37.     } elseif {[.iscollected] == "true"} {
  38.         .announcestate backpack
  39.     } elseif {[.getcharges] <= 0} {
  40.         # wird das noch gebraucht????
  41.         .setremoveable true
  42.     } elseif {[.getcreator] == "null"} {
  43.         .announcestate normal
  44.     }
  45. }
  46.  
  47. proc garagewatch_house {} {
  48.  
  49.     # kann zerstoert oder wieder zusammengeklappt werden
  50.     if {[.iskilled] == "true"} {
  51.         .announcestate explode
  52.     } elseif {[.getartefactmode] == "true"} {
  53.         .announcestate normal
  54.     } elseif {[.isworking] == "true"} {
  55.         .announcestate working
  56.     } elseif {[.isoutputvehicle] == "true"} {
  57.         .announcestate outputvehicle
  58.         .setoutputvehicle false
  59.     } elseif {[.removebuilding] == "true"} {
  60.         .announcestate remove
  61.     } elseif {[.getsleepmode] == "true"} {
  62.         .announcestate offline
  63.     }
  64. }
  65.  
  66. proc garagewatch_offline {} {
  67.  
  68.     # kann zerstoert oder wieder zusammengeklappt werden
  69.     if {[.iskilled] == "true"} {
  70.         .announcestate explode
  71.     } elseif {[.getartefactmode] == "true"} {
  72.         .announcestate normal
  73.     } elseif {[.getsleepmode] == "false"} {
  74.         .announcestate house
  75.     } elseif {[.removebuilding] == "true"} {
  76.         .announcestate remove
  77.     }
  78. }
  79.  
  80. proc garagewatch_working {} {
  81.  
  82.     # kann zerstoert oder wieder zusammengeklappt werden
  83.     if {[.iskilled] == "true"} {
  84.         .announcestate explode
  85.     } elseif {[.getartefactmode] == "true"} {
  86.         .announcestate normal
  87.     } elseif {[.isworking] == "false"} {
  88.         .announcestate house
  89.     } elseif {[.isoutputvehicle] == "true"} {
  90.         # denn es kann ja ein artefact gebaut werden
  91.         .announcestate outputvehicle
  92.         .setoutputvehicle false
  93.     } elseif {[.removebuilding] == "true"} {
  94.         .announcestate remove
  95.     } elseif {[.getsleepmode] == "true"} {
  96.         .announcestate offline
  97.     }
  98. }
  99.  
  100.  
  101. proc garagewatch_bauphase {} {
  102.  
  103.     # kann zerstoert oder wieder zusammengeklappt werden
  104.     if {[.iskilled] == "true"} {
  105.         .announcestate explode
  106.     } elseif {[.getartefactmode] == "true"} {
  107.         .announcestate normal
  108.     } elseif {[.isstatetimeover] == "true"} {
  109.         .announcestate house
  110.         usersymbolicname playergarage
  111.     }
  112. }
  113.  
  114. proc garagewatch_explode {} {
  115.  
  116.     # Uebergang zum Artefakt oder wegnehmen
  117.     if {[.isanimfinished] == "true"} {
  118.         if {[.getcharges] <= 0} {
  119.             .setremoveable true
  120.         } else {
  121.             .announcestate normal
  122.             .removefromisland
  123.         }
  124.     }
  125. }
  126.  
  127. proc garagewatch_remove {} {
  128.  
  129.     # Uebergang zum Artefakt oder wegnehmen
  130.     if {[.isanimfinished] == "true"} {
  131.         if {[.getcharges] <= 0} {
  132.             .setremoveable true
  133.         } else {
  134.             .announcestate normal
  135.             .removefromisland
  136.         }
  137.     }
  138. }
  139.  
  140. proc garagewatch_backpack {} {
  141.  
  142.     # Moeglich: usgeworfen (Nicht mehr "gesammelt") oder im
  143.     # Menue gezeigt (sichtbar)
  144.     if {[.iscollected] == "false"} {
  145.         .announcestate normal
  146.     } elseif {[.isvisible] == "true"} {
  147.         .announcestate menue
  148.     }
  149. }
  150.  
  151. proc garagewatch_menu {} {
  152.  
  153.     if {[.isvisible] == "false"} {
  154.         .announcestate backpack
  155.     } elseif {[.getartefactuse] == "true"} {
  156.         .announcestate build
  157.     } elseif {[.iscollected] == "false"} {
  158.         .announcestate normal
  159.     }
  160. }
  161.  
  162. proc garagewatch_build {} {
  163.  
  164.     if {[.iskilled] == "true"} {
  165.         .announcestate explode
  166.     } elseif {[.getartefactmode] == "false"} {
  167.         .announcestate bauphase
  168.     } elseif {[.getartefactuse] == "false"} {
  169.         .announcestate backpack
  170.     }
  171. }
  172.  
  173. proc garagewatch_inputvehicle {} {
  174.  
  175.     # Wenn Einhol-Animation fertig ist, Zustand umschalten
  176.     if {[.iskilled] == "true"} {
  177.         .announcestate explode
  178.     } elseif {[.getartefactmode] == "true"} {
  179.         .announcestate normal
  180.     } elseif {[.isanimfinished] == "true"} {
  181.         .announcestate house
  182.     }
  183. }
  184.  
  185. proc garagewatch_outputvehicle {} {
  186.  
  187.     # Wenn Ausspuck-Animation fertig, wieder normalen Fabrik-Zustand
  188.     # schalten
  189.     if {[.iskilled] == "true"} {
  190.         .announcestate explode
  191.     } elseif {[.getartefactmode] == "true"} {
  192.         .announcestate normal
  193.     } elseif {[.isanimfinished] == "true"} {
  194.         .announcestate house
  195.     }
  196. }
  197.  
  198. proc garagewatch_cinematic {} {
  199.  
  200.     # empty
  201. }    
  202.  
  203.  
  204.